proc commands {nick handle chan otbn1 host} {

  global botnick otbnversion isXbot

  set otbnversion "\0034Running X-Bot 2003 by LogicX Software\003"    

  putlog "!$nick ($host)! commands"
  putquick "NOTICE $nick :$otbnversion"

  if {[matchattr $handle n]} {
    putquick "NOTICE $nick :\00312BOTNET ADMINISTRATOR\0034: Core"
  }    
  if {[matchattr $handle m]} {
    # Restart command is not supported in X-Bot but is supported if used in TCL, make necessary adjustments
    #   in commands list
    if {$isXbot == "1"} {
      putquick "NOTICE $nick :\00312BOTNET CO-ADMINISTRATOR\0033: Rehash  Sndmsg  Sndnotice  Servers"
    } else {
      putquick "NOTICE $nick :\00312BOTNET CO-ADMINISTRATOR\0033: Rehash  Restart  Sndmsg  Sndnotice  Servers"
    }
  }        
  if {[matchattr $handle o]} {
    putquick "NOTICE $nick :\00312BOTNET OPERATOR\0034: Addchan  Broadcast  Chanstats  Disable  Enable  Remchan  Save"
  }
  if {[matchattr $handle o|n $chan]} {
    putquick "NOTICE $nick :\00312CHANNEL ADMINISTRATOR\0033: Act  Cycle  Say"
  }  
  if {[matchattr $handle o|m $chan]} {
    putquick "NOTICE $nick :\00312CHANNEL CO-ADMINISTRATOR\0034: Killmodes  Mode  Useradd  Userdel  Usermod"
  }
  # Next one modified by |nsid3r to accomidate newly built-in onjoin command
  if {[matchattr $handle o|o $chan]} {
    putquick "NOTICE $nick :\00312OP\0033: Ban  Deop  Invite  Kick  OnJoin  Op  Topic  Unban"
  }
  if {[matchattr $handle o|o $chan]} {
    putquick "NOTICE $nick :\00312AVOICE\0034: Comment  Devoice  Sndnote  Voice"
  }
  if {[matchattr $handle o|v $chan]} {                                 
    putquick "NOTICE $nick :\00312AVOICE\0034: Comment  Devoice  Sndnote  Voice"
  }  

  putquick "NOTICE $nick :\00312PUBLIC\0033: Access  Admin  Auth  Banlist  Commands  Credits  Deauth  Pass  Seen  Userlist  Version"
  putquick "NOTICE $nick :-"
  putquick "NOTICE $nick :Uptime for this bot can be found at: \00312http://uptime.eggheads.org\003."
  putquick "NOTICE $nick :To get help on a command type \0034(/msg) $botnick help <command>\003"
}










